home *** CD-ROM | disk | FTP | other *** search
/ The Ultimate Frank Lloyd…ght - America's Architect / Ultimate Frank Lloyd Wright, The - America's Architect (1994)(Microsoft Home).iso / pre / flw / flwchf.dir / 00099_Script_99 < prev    next >
Text File  |  1994-11-15  |  5KB  |  179 lines
  1. on startMovie
  2.   cursor 4
  3.   global nowFrame, currMM
  4.   global dialogOn, horness
  5.   set dialogOn = FALSE
  6.   set currMM = "FLWWW"
  7.   set the textSize of field "glossField" to 10
  8.   puppetSprite 22, TRUE
  9.   puppetSprite 23, TRUE
  10.   puppetSprite 21, TRUE
  11.   puppetSprite 14, TRUE
  12.   puppetSprite 8, TRUE
  13.   set the immediate of sprite 23 to TRUE
  14.   set the stretch of sprite 23 to FALSE
  15.   cursor -1
  16. end startMovie
  17.  
  18. on stepMovie
  19.   global nowFrame,currFrame
  20.   if nowFrame <> currFrame then
  21.     seeAlsoList
  22.     set currFrame = nowFrame
  23.   end if
  24. end stepMovie
  25.  
  26. on stopMovie
  27.   set the castNum of sprite 21 to 1050
  28.   puppetSprite 21, FALSE
  29.   put " " into field "SeeAlsoText"
  30.   updateStage
  31. end stopMovie
  32.  
  33. on saveLocals
  34.   global lastFrame, nowFrame, lastMovie
  35.   set lastMovie = "FLWCHF"
  36.   set lastFrame = nowFrame
  37. end saveLocals
  38.  
  39. on buttonState
  40.   global bflag, FrankNav, dialogOn
  41.   
  42.   
  43.   if dialogOn = FALSE then
  44.     
  45.     if rollover(15) then
  46.       periodRoll
  47.     else 
  48.       set the locV of sprite 14 to 490
  49.     end if
  50.     
  51.     -- don't check global buttons unless mouse is down at bottom
  52.     if (the mouseV > 200) or (bFlag = TRUE) then
  53.       set bFlag = FALSE
  54.       doState
  55.     end if
  56.   else if dialogOn = TRUE then
  57.     if the mouseDown then 
  58.       if the mouseCast <> the number of cast "glossDialog" then
  59.         beep
  60.       end if
  61.     end if
  62.   end if
  63. end buttonState
  64.  
  65. on chBackStep
  66.   global nowFrame
  67.   unLoadCast 9, 92
  68.   puppetSprite 8, FALSE
  69.   if nowFrame = "ch000bld019°°°" then
  70.     puppetTransition 1, 0, 8
  71.     go to frame "ch000bld018°°°" of movie "FLWCHE"
  72.   else
  73.     puppetTransition 1, 0, 8
  74.     go marker (-1)
  75.   end if
  76.   puppetSprite 8, TRUE
  77.   updateStage
  78. end chBackStep
  79.  
  80. on chForStep
  81.   global nowFrame
  82.   unLoadCast 9, 92
  83.   if chars(nowFrame,9,11) < 157 then
  84.     puppetSprite 8, FALSE
  85.     if nowFrame = "ch000bld060°°°" then
  86.       puppetTransition 2, 0, 8
  87.       go to frame "ch000bld061°°°" of movie "FLWCHG"
  88.     else
  89.       puppetTransition 2, 0, 8
  90.       go marker (+1)
  91.     end if
  92.     puppetSprite 8, TRUE
  93.     updateStage
  94.   end if
  95. end chForStep
  96.  
  97. on textRoll txHt
  98.   global topHat, horNess, dialogOn, seeAlsoBox
  99.   
  100.   if dialogOn = FALSE and seeAlsoBox = FALSE then
  101.     
  102.     set topHat = txHt
  103.     
  104.     if horNess = "ver" then
  105.       if the mouseH < 230 and the mouseV > 366 and the mouseV < 429 then
  106.         set the locV of sprite 8 to txHt
  107.         set the ink of sprite 16 to 8
  108.         set the foreColor of sprite 16 to 215
  109.         set rolledAlready = TRUE
  110.       else if the mouseH > 230 or the mouseV > 429 or the mouseV < topHat then
  111.         set the locV of sprite 8 to 364
  112.         set the ink of sprite 16 to 36
  113.         set the forecolor of sprite 16 to 0
  114.       end if
  115.       set horNess = "h"
  116.     else
  117.       if the mouseH < 414 and the mouseV > 366 and the mouseV < 429 then
  118.         set the locV of sprite 8 to txHt
  119.         set the ink of sprite 16 to 8
  120.         set the foreColor of sprite 16 to 215
  121.         set rolledAlready = TRUE
  122.       else if the mouseH > 414 or the mouseV > 429 or the mouseV < topHat then
  123.         set the locV of sprite 8 to 364
  124.         set the ink of sprite 16 to 36
  125.         set the forecolor of sprite 16 to 0
  126.       end if
  127.     end if
  128.   end if
  129. end textRoll
  130.  
  131. on periodRoll
  132.   global perV
  133.   put the mouseV - 206 into perV
  134.   put perV / 24 into perV
  135.   if perV = 0 then
  136.     set the locV of sprite 14 to 206
  137.   else if perV = 1 then
  138.     set the locV of sprite 14 to 230
  139.   else if perV = 2 then
  140.     set the locV of sprite 14 to 254
  141.   else if perV = 3 then
  142.     set the locV of sprite 14 to 278
  143.   else if perV = 4 then
  144.     set the locV of sprite 14 to 302
  145.   else if perV = 5 then
  146.     set the locV of sprite 14 to 326
  147.   else if perV = 6 then
  148.     set the locV of sprite 14 to 350
  149.   else if perV = 7 then
  150.     set the locV of sprite 14 to 374
  151.   else 
  152.     set the locV of sprite 14 to 490
  153.   end if
  154.   updateStage
  155. end periodRoll
  156.  
  157. on goPeriod
  158.   global perV, adjPerOn
  159.   puppetSprite 8, FALSE
  160.   if perV = 0 then
  161.     go to frame "ch000bld001°°°" of movie "FLWCHE"
  162.   else if perV = 1 then
  163.     go to frame "ch000bld003°°°" of movie "FLWCHE"
  164.   else if perV = 2 then
  165.     go to frame "ch000bld019°°°"
  166.     puppetSprite 8, TRUE
  167.   else if perV = 3 then
  168.     go to frame "ch000bld061°°°" of movie "FLWCHG"
  169.   else if perV = 4 then
  170.     go to frame "ch000bld074°°°" of movie "FLWCHG"
  171.   else if perV = 5 then
  172.     go to frame "ch000bld083°°°" of movie "FLWCHJ"
  173.   else if perV = 6 then
  174.     go to frame "ch000bld100°°°" of movie "FLWCHK"
  175.   else if perV = 7 then
  176.     go to frame "ch000bld118°°°" of movie "FLWCHL"
  177.   end if
  178.   updateStage
  179. end goPeriod